#include <iostream>
#include <string>
#include <vector>
#include <cctype>

int main() {
    std::string s;
    std::getline(std::cin, s);
    std::vector<std::string> words;
    std::string lat = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ";
    std::string kir = "ЙЦУКЕНГШЩЗХФЫВАПРОЛДЖЭЁЯЧСМИТБЮ";
    int kmax = 0;  // длина слова
    int k1 = 0;    // количество не превышающее 3
    int k2 = 0;    // количество содержащее латинский символ
    int k3 = 0;    // количество содержащее заглавный кириллический символ
    int k4 = 0;    // количество в которых есть -
    int wordmax = 0;

    std::string word;
    std::size_t pos = 0;
    while ((pos = s.find(' ')) != std::string::npos) {
        word = s.substr(0, pos);
        words.push_back(word);
        s.erase(0, pos + 1);
    }
    words.push_back(s);

    for (const auto& w : words) {
        if (w.length() > kmax) {
            kmax = w.length();
            wordmax = static_cast<int>(words.size()) - 1;
        }
        if (w.length() <= 3) {
            k1++;
        }
        bool hasLat = false;
        bool hasKir = false;
        for (char c : w) {
            if (lat.find(c) != std::string::npos) {
                k2++;
                hasLat = true;
                break;
            }
            if (kir.find(c) != std::string::npos && std::isupper(c)) {
                k3++;
                hasKir = true;
                break;
            }
        }
        if (w.find('-') != std::string::npos) {
            k4++;
        }
    }

    std::cout << "Кол-во слов: " << words.size() << std::endl;
    std::cout << "Кол-во слов с заглавной кириллической буквы: " << k3 << std::endl;
    std::cout << "Кол-во слов содержащих латинский символ: " << k2 << std::endl;
    std::cout << "Кол-во слов не превышающих 3 символа: " << k1 << std::endl;
    std::cout << "Кол-во слов в составе которых есть дефис: " << k4 << std::endl;
    std::cout << std::endl;
    std::cout << "Самое длинное слово: " << words[wordmax] << std::endl;
    std::cout << "Длина слова: " << kmax << std::endl;

    return 0;
}

